home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 21
/
AMIGAplus Sonderheft 21 (1999)(ICP)(DE)[!].iso
/
Multimedia
/
Musik
/
WAVE
/
PLAY
< prev
next >
Wrap
Text File
|
1999-08-18
|
676b
|
28 lines
; **** Future © Player - WAVE-Playskript von Cord Hagen ****
; ****** PLAY16 muß sich im C-Verzeichnis befinden *********
ASSIGN FPTARGET: ""
CD FPTARGET:
SETENV CDDIR=FPTARGET:
SETENV CDMP3=#?.wav
LAB CHOICE1
REQUESTFILE DRAWERSONLY NOICONS TITLE "Future © Player - Wähle Verzeichnis ...." > ENV:CDDIR
CD $CDDIR
LAB CHOICE2
REQUESTFILE TITLE "Future © Player - Wähle WAVE-Datei ...." > ENV:CDMP3
PLAY16 $CDMP3 >NIL:
SETENV MP3=#?
REQUESTCHOICE >ENV:MP3 "Future © Player""Möchten Sie eine weitere WAVE-Datei abspielen ?" Ja Nein
IF $MP3 EQ 0
SKIP ENDE
ENDIF
IF $MP3 EQ 1
SKIP CHOICE2 BACK
ENDIF
LAB ENDE
RUN >NIL: DELETE ENV:MP3
; "Only AMIGA make it possible ...." ;-)